SQLDIRECT "DISCONNECT SESSION 1"
SCREXEC SQLCLEAR.scr
SETVAL SQLSTATE=DB_DISCONNECT